home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 February
/
EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso
/
earcd
/
comm2
/
termsorc.lha
/
Extras
/
Source
/
term-source.lha
/
CursorPanel.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-09-28
|
9KB
|
387 lines
/*
** CursorPanel.c
**
** Editing panel for cursor key configuration
**
** Copyright © 1990-1995 by Olaf `Olsen' Barthel
** All Rights Reserved
*/
#include "termGlobal.h"
enum { GAD_QUALIFIER=1,GAD_UP,GAD_DOWN,GAD_RIGHT,GAD_LEFT,
GAD_USE,GAD_LOAD,GAD_SAVE,GAD_CANCEL,GAD_DEFAULT,
};
BOOLEAN __regargs
CursorPanel(struct CursorKeys *CursorKeys,STRPTR LastCursorKeys,struct Window *Parent,BYTE *ChangedPtr)
{
struct CursorKeys *Keys;
ULONG OldCRC;
BOOLEAN CursorKeysChanged;
if(ChangedPtr)
CursorKeysChanged = *ChangedPtr;
else
CursorKeysChanged = FALSE;
OldCRC = DoCRC(CursorKeys,sizeof(struct CursorKeys));
if(Keys = (struct CursorKeys *)AllocVecPooled(sizeof(struct CursorKeys),MEMF_ANY))
{
struct LayoutHandle *Handle;
CopyMem(CursorKeys,Keys,sizeof(struct CursorKeys));
if(Handle = LT_CreateHandleTags(Window -> WScreen,
LH_LocaleHook, &LocaleHook,
TAG_DONE))
{
struct Window *PanelWindow;
LT_New(Handle,
LA_Type, VERTICAL_KIND,
TAG_DONE);
{
LT_New(Handle,
LA_Type, VERTICAL_KIND,
LA_LabelID, MSG_V36_0029,
TAG_DONE);
{
LT_New(Handle,
LA_Type, VERTICAL_KIND,
TAG_DONE);
{
LT_New(Handle,
LA_Type, CYCLE_KIND,
LA_LabelID, MSG_MACROPANEL_KEY_MODIFIER_GAD,
LA_ID, GAD_QUALIFIER,
LACY_TabKey, TRUE,
LACY_FirstLabel,MSG_MACROPANEL_NONE_TXT,
LACY_LastLabel, MSG_MACROPANEL_CONTROL_TXT,
TAG_DONE);
LT_New(Handle,
LA_Type, XBAR_KIND,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_New(Handle,
LA_Type, VERTICAL_KIND,
TAG_DONE);
{
LT_New(Handle,
LA_Type, STRING_KIND,
LA_LabelID, MSG_CURSORPANEL_CURSOR_UP_GAD,
LA_Chars, 30,
LA_ID, GAD_UP,
GTST_MaxChars, 255,
TAG_DONE);
LT_New(Handle,
LA_Type, STRING_KIND,
LA_LabelID, MSG_CURSORPANEL_CURSOR_DOWN_GAD,
LA_Chars, 30,
LA_ID, GAD_DOWN,
GTST_MaxChars, 255,
TAG_DONE);
LT_New(Handle,
LA_Type, STRING_KIND,
LA_LabelID, MSG_CURSORPANEL_CURSOR_RIGHT_GAD,
LA_Chars, 30,
LA_ID, GAD_RIGHT,
GTST_MaxChars, 255,
TAG_DONE);
LT_New(Handle,
LA_Type, STRING_KIND,
LA_LabelID, MSG_CURSORPANEL_CURSOR_LEFT_GAD,
LA_Chars, 30,
LA_ID, GAD_LEFT,
GTST_MaxChars, 255,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_EndGroup(Handle);
}
LT_New(Handle,
LA_Type,VERTICAL_KIND,
TAG_DONE);
{
LT_New(Handle,
LA_Type, XBAR_KIND,
LAXB_FullSize, TRUE,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_New(Handle,LA_Type,HORIZONTAL_KIND,
LAGR_SameSize, TRUE,
LAGR_Spread, TRUE,
TAG_DONE);
{
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_USE_GAD,
LA_ID, GAD_USE,
LABT_ReturnKey, TRUE,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_DEFAULT_GAD,
LA_ID, GAD_DEFAULT,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_LOAD_GAD,
LA_ID, GAD_LOAD,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_SAVE_GAD,
LA_ID, GAD_SAVE,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_New(Handle,
LA_Type, BUTTON_KIND,
LA_LabelID, MSG_GLOBAL_CANCEL_GAD,
LA_ID, GAD_CANCEL,
LABT_EscKey, TRUE,
LABT_ExtraFat, TRUE,
TAG_DONE);
LT_EndGroup(Handle);
}
LT_EndGroup(Handle);
}
if(PanelWindow = LT_Build(Handle,
LAWN_TitleID, MSG_CURSORPANEL_CURSOR_PREFERENCES_TXT,
LAWN_IDCMP, IDCMP_CLOSEWINDOW,
LAWN_HelpHook, &GuideHook,
LAWN_Parent, Parent,
WA_DepthGadget, TRUE,
WA_CloseGadget, TRUE,
WA_DragBar, TRUE,
WA_RMBTrap, TRUE,
WA_Activate, TRUE,
WA_SimpleRefresh, TRUE,
TAG_DONE))
{
struct IntuiMessage *Message;
BOOLEAN Done = FALSE;
ULONG MsgClass;
UWORD MsgCode;
struct Gadget *MsgGadget;
UBYTE DummyBuffer[MAX_FILENAME_LENGTH],
*DummyChar;
struct FileRequester *FileRequest;
LONG Modifier = 0,i;
GuideContext(CONTEXT_CURSOR);
PushWindow(PanelWindow);
LT_ShowWindow(Handle,TRUE);
for(i = 0 ; i < 4 ; i++)
{
LT_SetAttributes(Handle,GAD_UP + i,
GTST_String,Keys -> Keys[Modifier][i],
TAG_DONE);
}
do
{
if(Wait(PORTMASK(PanelWindow -> UserPort) | SIG_BREAK) & SIG_BREAK)
{
CopyMem(CursorKeys,Keys,sizeof(struct CursorKeys));
break;
}
while(Message = (struct IntuiMessage *)LT_GetIMsg(Handle))
{
MsgClass = Message -> Class;
MsgCode = Message -> Code;
MsgGadget = (struct Gadget *)Message -> IAddress;
LT_ReplyIMsg(Message);
if(MsgClass == IDCMP_CLOSEWINDOW)
{
CopyMem(CursorKeys,Keys,sizeof(struct CursorKeys));
Done = TRUE;
}
if(MsgClass == IDCMP_GADGETUP)
{
switch(MsgGadget -> GadgetID)
{
case GAD_DEFAULT:
ResetCursorKeys(Keys);
for(i = 0 ; i < 4 ; i++)
{
LT_SetAttributes(Handle,GAD_UP + i,
GTST_String,Keys -> Keys[Modifier][i],
TAG_DONE);
}
break;
case GAD_QUALIFIER:
for(i = 0 ; i < 4 ; i++)
strcpy(Keys -> Keys[Modifier][i],(STRPTR)LT_GetAttributes(Handle,GAD_UP + i,TAG_DONE));
Modifier = MsgCode;
for(i = 0 ; i < 4 ; i++)
{
LT_SetAttributes(Handle,GAD_UP + i,
GTST_String,Keys -> Keys[Modifier][i],
TAG_DONE);
}
break;
case GAD_USE:
for(i = 0 ; i < 4 ; i++)
strcpy(Keys -> Keys[Modifier][i],(STRPTR)LT_GetAttributes(Handle,GAD_UP + i,TAG_DONE));
if(OldCRC != DoCRC(CursorKeys,sizeof(struct CursorKeys)))
{
CopyMem(Keys,CursorKeys,sizeof(struct CursorKeys));
CursorKeysChanged = TRUE;
}
else
CursorKeysChanged = FALSE;
Done = TRUE;
break;
case GAD_CANCEL:
CopyMem(CursorKeys,Keys,sizeof(struct CursorKeys));
CursorKeysChanged = FALSE;
Done = TRUE;
break;
case GAD_LOAD:
strcpy(DummyBuffer,LastCursorKeys);
DummyChar = PathPart(DummyBuffer);
*DummyChar = 0;
LT_LockWindow(PanelWindow);
if(FileRequest = GetFile(PanelWindow,LocaleString(MSG_CURSORPANEL_LOAD_CURSOR_KEYS_TXT),DummyBuffer,FilePart(LastCursorKeys),DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_LOAD_TXT),TRUE))
{
if(!ReadIFFData(DummyBuffer,Keys,sizeof(struct CursorKeys),ID_KEYS))
ShowError(PanelWindow,ERR_LOAD_ERROR,IoErr(),DummyBuffer);
else
{
OldCRC = DoCRC(CursorKeys,sizeof(struct CursorKeys));
CursorKeysChanged = FALSE;
if(ChangedPtr)
*ChangedPtr = FALSE;
strcpy(Config -> CursorFileName,DummyBuffer);
strcpy(LastCursorKeys,DummyBuffer);
for(i = 0 ; i < 4 ; i++)
{
LT_SetAttributes(Handle,GAD_UP + i,
GTST_String,Keys -> Keys[Modifier][i],
TAG_DONE);
}
}
FreeAslRequest(FileRequest);
}
LT_UnlockWindow(PanelWindow);
break;
case GAD_SAVE:
strcpy(DummyBuffer,LastCursorKeys);
DummyChar = PathPart(DummyBuffer);
*DummyChar = 0;
LT_LockWindow(PanelWindow);
for(i = 0 ; i < 4 ; i++)
strcpy(Keys -> Keys[Modifier][i],(STRPTR)LT_GetAttributes(Handle,GAD_UP + i,TAG_DONE));
if(FileRequest = GetFile(PanelWindow,LocaleString(MSG_CURSORPANEL_SAVE_CURSOR_KEYS_TXT),DummyBuffer,FilePart(LastCursorKeys),DummyBuffer,"#?.prefs",TRUE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SAVE_TXT),TRUE))
{
if(!WriteIFFData(DummyBuffer,Keys,sizeof(struct CursorKeys),ID_KEYS))
ShowError(PanelWindow,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
else
{
strcpy(LastCursorKeys,DummyBuffer);
CursorKeysChanged = FALSE;
if(ChangedPtr)
*ChangedPtr = FALSE;
}
FreeAslRequest(FileRequest);
}
LT_UnlockWindow(PanelWindow);
break;
}
}
}
}
while(!Done);
PopWindow();
}
LT_DeleteHandle(Handle);
}
FreeVecPooled(Keys);
}
if(ChangedPtr)
*ChangedPtr |= CursorKeysChanged;
return(CursorKeysChanged);
}